home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 009 / ezwritr.unp < prev    next >
Encoding:
Text File  |  1983-09-05  |  3.4 KB  |  87 lines
  1. 10 '
  2. 20 '     ***** UNPROTECT EZWRITER 1.1 ***** BY JPM - ORLANDO FLA
  3. 30 '
  4. 40 ' THIS PROGRAM IS TO HELP ALL OF YOU THAT HAVE FOUND THAT YOU
  5. 50 ' COPIED YOUR EZWRITER 1.1 BACKUP TO SINGLE SIDED DISKETTE
  6. 60 ' AND NOW YOU HAVE A DOUBLE SIDED DRIVE OR FIXED DISK,
  7. 70 '  OR RAM DISK AND YOU ARE UP THE I/O CHANNEL WITHOUT A BYTE.
  8. 80 '
  9. 90 '   THE WAY THE EZWRITER PROTECTION WORKS IS:
  10. 100 '
  11. 110 '   1). A BAD TRACK IS CREATED ON THE DISKETTE (LAST TRACK)
  12. 120 '      SO THAT DISK COPY WOULD NOT WORK.
  13. 130 '      IT REALLY DOES WORK THOUGH, BUT THE BAD TRACK IS
  14. 140 '      IS NOT COPIED. THIS BAD TRACK IS THE KEY.
  15. 150 '      WITH OUT THE BAD TRACK , WHICH EZWRITE NEEDS TO READ
  16. 160 '      THE PROGRAM WILL NOT RUN.
  17. 170 '   2). EW1.COM IS READ IN (YOU DO THIS). EW1.COM INTURN
  18. 180 '      LOADS "IBM88VMI.COM", WHICH INTURN LOADS "TARGET.COM".
  19. 190 '      TARGET.COM IS THE GUTS OF EZWRITER.
  20. 200 '      "IBM88VMI.COM" CHECKS FOR THE BAD TRACK, AND IF IT
  21. 210 '      IS THERE LOADS "TARGET.COM" OTHERWISE BYE-BYE.
  22. 220 '       WHAT THIS SIMPLE PROGRAM DOES IS TELLS "IBM88VMI.COM"
  23. 230 '      TO IGNORE THE RESULTS OF THE CHECK FOR THE BAD TRACK.
  24. 240 '       THIS WAY AFTER YOU DO A "COPY *.*" OR "DISKCOPY"
  25. 250 '      YOU CAN THE USE AND MOVE THE EZWRITER PROGRAM TO ANY
  26. 260 '      MAGNETIC STORAGE MEDIA.
  27. 270 '
  28. 280 '***************************************************************
  29. 290 '
  30. 300 ' TO MAKE A UNPROTECTED COPY OF EZWRITER:
  31. 310 '
  32. 320 '  1). PUT THE ORIGINAL OR BACKUP IN DRIVE "A"
  33. 330 '  2). PUT A FORMATED (SINGLE OR DOUBLE) DISKETTE IN DRIVE "B:"
  34. 340 '  3). COPY *.* B:
  35. 350 '  4). REMOVE EZWRITER FROM DRIVE "A:"
  36. 360 '  5). LOAD BASIC FROM "A:" AND ONCE IN BASIC LOAD  THIS PROGRAM
  37. 370 '   6). RUNTHIS PROGRAM , LOW AND BEHOLD THE COPIED EZWRITER
  38. 380 '      DISKETTE IN DRIVE "B: SHOULD NOW BE UNPROTECTED AND
  39. 390 '      TRANSPORTABLE AS WELL AS TOTALLY FUNCTIONAL.
  40. 400 '  7). AS ALWAYS PUT YOUR BACKUP DISKETTES IN A SAFE PLACE
  41. 410 '     IN CASE OF PROBLEMS WITH THE COPIES.
  42. 420 '
  43. 430 '     SINCE YOU NOW HAVE A UNPROTECTED VERSION OF EZWRITER
  44. 440 '  THE COPIES SHOULD BE FOR YOUR USE ONLY. YOU ARE STILL
  45. 450 '  BOUND BY THE LICENSE AGREEMENT WHEN YOU PURCHASED THE
  46. 460 '  PACKAGE.
  47. 470 CLS
  48. 480 CLOSE
  49. 490 DEFINT A-Z
  50. 500 '
  51. 510 ' YOU SHOULD NOP RECORD(BYTE) 390 AND 391
  52. 520 ' THEY CONTAIN HEX(CD20) WHICH IS A BRANCH IF BAD TRACK NOT FOUND
  53. 530 ' THIS ONE LITTLE INSTRUCTION KEEPS YOU FROM RUNNING
  54. 540 '
  55. 550 ' THERE IS NO ERROR CHECKING DONE , SUCH AS FOR MISSING FILE,
  56. 560 ' WRITE PROTECTED DISKETTE OR OTHER POSSIBLE I/O ERRORS.
  57. 570 '
  58. 580 '
  59. 590 NOP$=CHR$(144)
  60. 600 BRANCH.BYTE1$=CHR$(205)
  61. 610 BRANCH.BYTE2$=CHR$(32)
  62. 620 OPEN "B:IBM88VMI.COM" AS #1 LEN=1
  63. 630 GET #1,390
  64. 640 FIELD 1,1 AS A$
  65. 650 BYTE$=A$
  66. 651 PRINT "VAULE READ FOR BYTE 390 WAS ";ASC(BYTE$)
  67. 660 IF BYTE$<>BRANCH.BYTE1$ THEN GOTO 770
  68. 670 LSET A$=NOP$
  69. 680 PUT 1,390
  70. 690 GET #1,391
  71. 700 FIELD 1,1 AS A$
  72. 710 BYTE$=A$
  73. 711 PRINT "VALUE READ FOR BYTE 391 WAS ";ASC(BYTE$)
  74. 720 IF BYTE$<>BRANCH.BYTE2$ THEN GOTO 770
  75. 730 LSET A$=NOP$
  76. 740 PUT 1,391
  77. 750 CLOSE
  78. 760 END
  79. 770 PRINT "THE BYTE YOU WERE TRYING TO NOP WAS ";ASC(BYTE$)
  80. 780 PRINT "THE BYTE SHOULD HAVE BEEN EITHER 32 OR 205"
  81. 790 PRINT "IF THE BYTE READ WAS 144 YOU HAVE PROBABLY"
  82. 800 PRINT "UNPROTECTED THE PROGRAM ONCE BEFORE"
  83. 810 PRINT "IF PROBLEMS GOTO YOUR BACKUP DISKETTES"
  84. 820 END
  85. AVE PROBABLY"
  86. 800 PRINT "UNPROTECTED THE PROGRAM ONCE BEFORE"
  87. 810 PRINT "I